object ButtonDialog: TButtonDialog Left = 141 Top = 111 ActiveControl = OKBtn BorderStyle = bsDialog Caption = 'Buttons' ClientHeight = 315 ClientWidth = 564 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ShowHint = True OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnDeactivate = FormDeactivate PixelsPerInch = 96 TextHeight = 13 object Label7: TLabel Left = 8 Top = 32 Width = 120 Height = 13 Caption = 'Click on a button to edit it' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object OKBtn: TBitBtn Left = 312 Top = 284 Width = 77 Height = 27 Caption = 'OK' Default = True Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 1 ParentFont = False TabOrder = 0 OnClick = OKBtnClick Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 398 Top = 284 Width = 77 Height = 27 Cancel = True Caption = 'Cancel' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 2 ParentFont = False TabOrder = 1 OnClick = CancelBtnClick Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object ButtonList: TListBox Left = 8 Top = 56 Width = 129 Height = 193 ExtendedSelect = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False TabOrder = 2 OnClick = ButtonListClick OnMouseDown = ButtonListMouseDown end object NewBtn: TBitBtn Left = 8 Top = 252 Width = 76 Height = 27 Caption = '&New' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = NewBtnClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333 3BB33773333773333773B333333B3333333B7333333733333337} Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object BitBtn2: TBitBtn Left = 484 Top = 284 Width = 77 Height = 27 HelpContext = 150 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 Kind = bkHelp Margin = 2 Spacing = -1 IsControl = True end object UpBtn: TBitBtn Left = 92 Top = 258 Width = 22 Height = 21 Hint = 'Move Button Up|' ParentShowHint = False ShowHint = True TabOrder = 5 OnClick = UpBtnClick Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333333333333333333333333333 333333333333333333333333333333333333333333333333333333E444444444 44433338FFFFFFFFFFFF33E6666666666643333833333333333F333E66666666 643333338333333333F33333E666666643333333383333333F3333333E666664 3333333333833333F333333333E66643333333333338333F33333333333E6433 33333333333383F3333333333333E33333333333333338333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} Margin = 1 NumGlyphs = 2 Spacing = -1 IsControl = True end object DownBtn: TBitBtn Left = 115 Top = 258 Width = 22 Height = 21 Hint = 'Move Button Down|' ParentShowHint = False ShowHint = True TabOrder = 6 OnClick = DownBtnClick Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333333333333333333333333333 333333333333333333333333333343333333333333333F333333333333346433 333333333333F383333333333346664333333333333F33383333333334666664 3333333333F333338333333346666666433333333F3333333833333466666666 64333333F3333333338333E6666666666643333F33333333333833EEEEEEEEEE EE43333FFFFFFFFFFFF833333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} Margin = 1 NumGlyphs = 2 Spacing = -1 IsControl = True end object DelBtn: TBitBtn Left = 92 Top = 284 Width = 27 Height = 27 Hint = 'Delete button|' TabOrder = 7 OnClick = DelBtnClick Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000 3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070 33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070 33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070 333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070 03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070 33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777 0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033 3333333337FFF7F33333333330000033333333333777773333330000} NumGlyphs = 2 Spacing = -1 IsControl = True end object TabbedNotebook1: TTabbedNotebook Left = 144 Top = 24 Width = 420 Height = 257 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] TabsPerRow = 6 TabFont.Color = clBtnText TabFont.Height = -11 TabFont.Name = 'MS Sans Serif' TabFont.Style = [] TabOrder = 8 object TTabPage Left = 4 Top = 24 Caption = 'Button' object Image1: TImage Left = 32 Top = 8 Width = 32 Height = 32 AutoSize = True end object Label8: TLabel Left = 72 Top = 8 Width = 295 Height = 13 Caption = 'Push buttons are labelled with the Off Caption and execute the' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label9: TLabel Left = 88 Top = 24 Width = 136 Height = 13 Caption = 'On Command when pressed.' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label10: TLabel Left = 72 Top = 40 Width = 261 Height = 13 Caption = 'Toggle buttons store their state in the specified Variable' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label11: TLabel Left = 88 Top = 56 Width = 292 Height = 13 Caption = 'and display the Off Caption when off, the On Caption when on' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label12: TLabel Left = 88 Top = 72 Width = 307 Height = 13 Caption = 'execute the On Command when pressed once, the Off Command' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label13: TLabel Left = 88 Top = 88 Width = 293 Height = 13 Caption = 'when pressed again. The expression in the Value field can be' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label14: TLabel Left = 88 Top = 104 Width = 178 Height = 13 Caption = 'used to specify the state of the button' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label6: TLabel Left = 22 Top = 130 Width = 56 Height = 13 Alignment = taRightJustify Caption = 'Off Caption:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object OnLabel: TLabel Left = 214 Top = 130 Width = 56 Height = 13 Alignment = taRightJustify Caption = 'On Caption:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 11 Top = 154 Width = 67 Height = 13 Alignment = taRightJustify Caption = 'On Command:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object OffLabel: TLabel Left = 11 Top = 178 Width = 67 Height = 13 Alignment = taRightJustify Caption = 'Off Command:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label5: TLabel Left = 37 Top = 202 Width = 41 Height = 13 Alignment = taRightJustify Caption = 'Variable:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 240 Top = 202 Width = 30 Height = 13 Alignment = taRightJustify Caption = 'Value:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object SpeedButton1: TSpeedButton Left = 88 Top = 152 Width = 20 Height = 20 Hint = 'Edit On Command|' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000 000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F 00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B 0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F 0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF 00333377737FFFFF7733333033000000033333373377777773330000} NumGlyphs = 2 OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Left = 88 Top = 176 Width = 20 Height = 20 Hint = 'Edit Off Command|' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000 000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F 00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B 0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F 0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF 00333377737FFFFF7733333033000000033333373377777773330000} NumGlyphs = 2 OnClick = SpeedButton2Click end object OffCaption: TEdit Left = 88 Top = 128 Width = 121 Height = 17 AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnChange = OffCaptionChange end object OnCaption: TEdit Left = 280 Top = 128 Width = 121 Height = 17 AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnChange = OnCaptionChange end object OnCommand: TEdit Left = 112 Top = 152 Width = 289 Height = 17 AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnChange = OnCommandChange end object OffCommand: TEdit Left = 112 Top = 176 Width = 289 Height = 17 AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnChange = OffCommandChange end object Toggle: TEdit Left = 88 Top = 200 Width = 121 Height = 17 AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnChange = BoolValChange end object BoolVal: TEdit Left = 280 Top = 200 Width = 121 Height = 17 AutoSize = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnChange = BoolValChange end end object TTabPage Left = 4 Top = 24 Caption = 'Advanced' object Image3: TImage Left = 32 Top = 8 Width = 32 Height = 32 AutoSize = True end object Label17: TLabel Left = 72 Top = 8 Width = 197 Height = 13 Caption = 'Advanced buttons features coming soon!!' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end end object TTabPage Left = 4 Top = 24 Caption = 'Location' object Image2: TImage Left = 32 Top = 8 Width = 32 Height = 32 AutoSize = True end object Label15: TLabel Left = 72 Top = 8 Width = 169 Height = 13 Caption = 'Select the location of the button bar' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label16: TLabel Left = 88 Top = 24 Width = 173 Height = 13 Caption = 'or select None to hide the button bar' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object GroupBox5: TGroupBox Left = 80 Top = 60 Width = 113 Height = 121 Caption = 'Location' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 object Top: TRadioButton Left = 24 Top = 24 Width = 65 Height = 17 Alignment = taLeftJustify Caption = 'Top' Checked = True TabOrder = 0 TabStop = True OnClick = TopClick end object Bottom: TRadioButton Left = 24 Top = 40 Width = 65 Height = 17 Alignment = taLeftJustify Caption = 'Bottom' TabOrder = 1 OnClick = TopClick end object Left: TRadioButton Left = 24 Top = 56 Width = 65 Height = 17 Alignment = taLeftJustify Caption = 'Left' TabOrder = 2 OnClick = TopClick end object Right: TRadioButton Left = 24 Top = 72 Width = 65 Height = 17 Alignment = taLeftJustify Caption = 'Right' TabOrder = 3 OnClick = TopClick end object None: TRadioButton Left = 24 Top = 88 Width = 65 Height = 17 Alignment = taLeftJustify Caption = 'None' TabOrder = 4 OnClick = TopClick end end end end object Panel1: TPanel Left = 0 Top = 0 Width = 564 Height = 22 Align = alTop BevelOuter = bvNone Caption = 'Panel1' TabOrder = 9 object Panel2: TPanel Left = 0 Top = 0 Width = 23 Height = 22 Align = alLeft BevelOuter = bvNone TabOrder = 0 object TopBtn: TSpeedButton Left = 0 Top = 0 Width = 22 Height = 22 Hint = 'Keep on top|' AllowAllUp = True GroupIndex = 1 Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333 3333333333333333333333333330333333333333333333333333333333303333 3333333333333333333333333330333333333333333333333333333333303333 3333333333333333333333339999999333333333333333333333339999999999 9333333333333333333333999111119913333333333333333333333919999911 3333333333333333333333339999991333333333333333333333333399999913 3333333333333333333333339111111333333333333333333333333319999913 3333333333333333333333399999999933333333333333333333333399999993 3333333333333333333333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} NumGlyphs = 2 OnClick = TopBtnClick end end object Panel3: TPanel Left = 23 Top = 0 Width = 541 Height = 22 Align = alClient TabOrder = 1 object WalkBtn: TPanel Left = 338 Top = 1 Width = 88 Height = 20 Align = alLeft Alignment = taLeftJustify BevelOuter = bvNone Caption = 'Speed&walking' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = WalkBtnClick end object TrigBtn: TPanel Left = 274 Top = 1 Width = 64 Height = 20 Align = alLeft Alignment = taLeftJustify BevelOuter = bvNone Caption = '&Triggers' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = TrigBtnClick end object ButBtn: TPanel Left = 210 Top = 1 Width = 64 Height = 20 Align = alLeft Alignment = taLeftJustify BevelOuter = bvNone Caption = '&Buttons' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = ButBtnClick end object VarBtn: TPanel Left = 82 Top = 1 Width = 64 Height = 20 Align = alLeft Alignment = taLeftJustify BevelOuter = bvNone Caption = '&Variables' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = VarBtnClick end object Panel7: TPanel Left = 18 Top = 1 Width = 64 Height = 20 Align = alLeft Alignment = taLeftJustify BevelOuter = bvNone Caption = '&Aliases' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = Panel7Click end object Panel4: TPanel Left = 1 Top = 1 Width = 17 Height = 20 Align = alLeft BevelOuter = bvNone TabOrder = 5 end object Panel5: TPanel Left = 146 Top = 1 Width = 64 Height = 20 Align = alLeft Alignment = taLeftJustify BevelOuter = bvNone Caption = '&Macros' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 6 OnClick = Panel5Click end end end object CopyBtn: TBitBtn Left = 8 Top = 284 Width = 76 Height = 27 Caption = '&Copy' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 10 OnClick = CopyBtnClick Glyph.Data = { 56070000424D5607000000000000360400002800000028000000140000000100 0800000000002003000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303 03030303030303030303030303030303030303030303FFFFFFFFFFFFFFFFFFFF 0303030303030303030000000000000000000003030303030303030303F8F8F8 F8F8F8F8F8F8F8FF03030303030303030300FFFFFFFFFFFFFFFF000303030303 0303030303F8FF03030303030303F8FF03030303030303030300FBFFFBFFFBFF FBFF0003030303030303030303F8FF03FFFFFFFFFFFFF8FF0303030303030303 0300FFF8F8F8F8F8F8FF0003030303030303030303F8FFF8F8F8F8F8F803F8FF 03030303030303030300FBFFFBFFFBFFFBFF00030303030303FFFFFFFFF8FF03 FFFFFFFFFFFFF8FF03030303000000000000FFF8F8F8F8F8F8FF000303030303 F8F8F8F8F8F8FFF8F8F8F8F8F803F8FF0303030300FFFFFFFF00FBFFFBFFFBFF FBFF000303030303F8FF030303F8FF03FFFFFFFFFFFFF8FF0303030300FFFFFF FF00FFF8F8F8F8F8F8FF000303030303F8FF030303F8FFF8F8F8F8F8F803F8FF 0303030300FF07070700FBFFFBFFFBFFFBFF000303030303F8FF030303F8FF03 0303030303FFF8FF0303030300FFFFFFFF00FFFFFFFFFFFF0000000303030303 F8FF030303F8FF0303030303F8F8F8030303030300FF07070700FBFFFBFFFBFF 0000030303030303F8FF030303F8FFFFFFFFFFFFF8F803030303030300FFFFFF FF000000000000000003030303030303F8FF030303F8F8F8F8F8F8F8F8030303 0303030300FF070707070707FF0003030303030303030303F8FF030303030303 03F8FF03030303030303030300FFFFFFFFFFFFFFFF0003030303030303030303 F8FF030303030303FFF8FF03030303030303030300FFFFFFFFFFFF0000000303 0303030303030303F8FF0303030303F8F8F80303030303030303030300FFFFFF FFFFFF00000303030303030303030303F8FFFFFFFFFFFFF8F803030303030303 030303030000000000000000030303030303030303030303F8F8F8F8F8F8F8F8 0303030303030303030303030303030303030303030303030303030303030303 0303030303030303030303030303030303030303030303030303030303030303 0303030303030303030303030303030303030303030303030303} Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object PopupMenu1: TPopupMenu Left = 144 Top = 280 object MoveUp1: TMenuItem Caption = 'Move Up' ShortCut = 0 OnClick = UpBtnClick end object MoveDown1: TMenuItem Caption = 'Move Down' ShortCut = 0 OnClick = DownBtnClick end object N1: TMenuItem Caption = '-' ShortCut = 0 end object New1: TMenuItem Caption = 'New' ShortCut = 0 OnClick = NewBtnClick end object Copy1: TMenuItem Caption = 'Copy' ShortCut = 0 OnClick = CopyBtnClick end object Delete1: TMenuItem Caption = 'Delete' ShortCut = 0 OnClick = DelBtnClick end end end